CommonEvent 3333
Name = "クィーンヴァンパイア"

  999([3333])
  ConditionalBranch([0, 26, 1])
    JumpToLabel(["反省会"])
    Empty([])

  BranchEnd([])
  ShowPicture([5, "80_queenvanpire_st12", 0, 0, 0, 0, 100, 100, 0, 0])
  MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
  PlayBGM(["RPG::BGM(@name=\"ero1\", @volume=100, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Nngh..."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Now, I shall suck your bodily fluids..."])
  ShowText(["Be happy, for you will be sucked by the Queen herself."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Emitting strange magical power, the Queen's cloak expands..."])
  ShowText(["The crimson lining starts to rustle."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Emerging from the cloak's lining, countless tentacles start to wave in the air, surrounding me in a whirlpool of tentacles."])
  ShowText([""])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Hehe... I'll wrap you up in this."])
  ShowText(["You will give me all of your semen and blood..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>No...stop...Aaaaah!"])
  ShowText([""])
  PlaySE(["RPG::SE(@name=\"mon_ero_makituki3\", @pitch=100, @volume=100)"])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean12_innerworks_c2\", @volume=80, @pitch=100)"])
  ShowPicture([5, "ev_queenvanpire_hc1", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Without being able to resist, I'm treated as her simple prey..."])
  ShowText(["Wrapped up by her cloak, I'm deprived of my freedom."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The same time the cloak envelops my body, the tentacles start to crawl over my body."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["In addition, her fangs pierce into my neck."])
  ShowText(["Not only does it not hurt, but a warm feeling of pleasure starts to spread through my body from where the fangs pierce me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Her vagina opens up, and welcomes me into her..."])
  ShowText(["My penis is slowly sucked up into her warm interior."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ahhhh!"])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Fatima starts to squeeze and contract her vagina around my penis, her flesh wriggling around every so often and massaging me."])
  ShowText([""])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Hehe... How does it feel mating with a Queen?"])
  ShowText(["I'll squeeze you completely dry with my vagina..."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["And with my fangs, I'll suck your blood dry at the same time."])
  ShowText(["Nnnn... *Suck*"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Hyaaaa!!"])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["A groan of pleasure escapes my mouth as she starts to suck my blood."])
  ShowText(["A sweet, relaxing pleasure floods my body from where she's biting me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I feel my body trying to twitch and writhe around..."])
  ShowText(["But the cloak wrapped around me prevents me from even doing that."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The tentacles from her cloak stroke and rub against my whole body, not leaving a single space on my body free from some sort of stimulation."])
  ShowText([""])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Haha... I'll drain all of your bodily fluids."])
  ShowText(["Die as you go mad in the agony of absorption..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ah, aaaaah!!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The tentacles violating my body, Fatima raping me as she sucks my blood..."])
  ShowText(["There's no way a man could endure this kind of assault."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It's a hell of pleasure with no escape."])
  ShowText(["Unable to even writhe around, I can only go mad in ecstasy."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Urhg... Co...Coming..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Her warm flesh around my penis waves and rubs against me."])
  ShowText(["It's too much... Nobody could hold out from this."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Haha... Finish inside my vagina."])
  ShowText(["Pour that semen of yours into me."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Nnnn... *Suck*"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With a cold-blooded smile, the Queen continues sucking up more blood."])
  ShowText(["She keeps sucking out more blood from my neck."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The sweet pleasure doubles and a sense of weakness takes over my body..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["In tandem with her relentless bloodsucking, her vagina intensifies its movements."])
  ShowText(["My penis starts pulsing, announcing my surrender..."])
  CallCommonEvent([104])
  ShowPicture([5, "ev_queenvanpire_hc2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Auuuu..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I explode inside her warm vagina."])
  ShowText(["At the same time, she starts contracting her vagina in a strange, devilish way."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It's almost creating a type of suction on my penis, forcibly drawing out my semen into her."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Haaa... What...was that...?"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["And my ejaculation doesn't stop..."])
  ShowText(["It should have stopped shooting out semen after a few seconds, but mine is still pulsing inside her."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The intense sensation of orgasm is still exploding in my brain, as my penis continues to pulse and leak out inside her."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahh... It won't stop..."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["...Haha, it feels amazing, doesn't it?"])
  ShowText(["Devote everything of yours to me..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["N...no... Ahhh!"])
  ShowPicture([5, "ev_queenvanpire_hc3", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["A huge amount of semen is being shot into her."])
  ShowText(["This is too much... If this keeps up, I'm going to die."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["G...Get off..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I struggle to escape somehow..."])
  ShowText(["But the Queen Vampire just embraces me tighter, holding my limbs down with her cloak's tentacles."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I can't even run... All I can do is have my blood and semen forcibly sucked out of me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Stop... I'm going to die!"])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Haha... What are you talking about?"])
  ShowText(["We already covered this a while ago. You will give all of your bodily fluids to me."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["And it's not just semen."])
  ShowText(["It's everything."])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean13_innerworks_c3\", @volume=80, @pitch=100)"])
  ShowPicture([5, "ev_queenvanpire_hc4", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Suddenly, the Queen's cloak starts to rustle around..."])
  ShowText(["It expands and covers even more of my body, enveloping more of me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Stop, get off!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The tentacles suddenly press down even harder on my body."])
  ShowText(["It feels like I'm being swallowed by some huge creature..."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Hehehe... You're beyond help now."])
  ShowText(["Dry out into a shriveled corpse as you scream."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Hyaaaaaaaa...!"])
  ShowPicture([5, "ev_queenvanpire_hc5", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Little by little, more of my world is taken by the black cloak and tentacles."])
  ShowText(["My body is overrun by her tentacles as they rub all over me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It's like her cloak is already digesting me alive..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Urhg... Help...help..."])
  ShowPicture([5, "ev_queenvanpire_hc6", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["I'll start sucking your blood again..."])
  ShowText(["I'll suck you until you die, so prepare yourself..."])
  ShowPicture([5, "ev_queenvanpire_hc7", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Queen Vampire shows a sadistic smile..."])
  ShowText(["She pierces my neck again with her fangs!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Aiiie!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["At the same time, tentacles creep into her vagina and coil around my penis even as she rapes me."])
  ShowText(["Her tentacles wind around my penis and start squeezing and loosening around it."])
  ShowPicture([5, "ev_queenvanpire_hc8", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It makes it feel like she's forcibly squeezing out my semen even faster than ever."])
  ShowText(["The merciless stimulation makes each pulse of my penis shoot out even more semen into her."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahhhh!"])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Are you already seeing a bit of Heaven?"])
  ShowText(["You're going to be nothing but a dry corpse in my embrace soon enough..."])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Are you happy? Isn't it a great way to go?"])
  ShowText(["Hahaha."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahhgg... Ah!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My body relaxes in weakness as she drains everything from me."])
  ShowText(["My blood through her fangs, my semen into her vagina, and the rest of my fluids through her cloak..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahh...ah..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The storm of pleasure slowly takes over my brain, leaving me unable to do anything but focus on the ecstasy."])
  ShowText(["My reasoning is long gone and in its place, my mind is dominated by ecstasy."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My life itself is being sucked out, and I'm drying up..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ah...a..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["All my bodily fluids are sucked out..."])
  ShowText(["My life devoured by the Queen Vampire."])
  FadeoutBGS([1])
  ShowTextAttributes(["queenvampire_fc1", 1, 0, 2])
  ShowText(["\\n<Queen Vampire>"])
  ShowText(["Hehehe... You were delicious."])
  ShowText(["I'll even use the last of your flesh as some food."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Inside the cloak, the Hero's dried up corpse is melted down into a small amount of nutrients to be digested."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Thus, every piece of the Hero is used to feed the Queen Vampire."])
  FadeoutScreen([])
  ErasePicture([5])
  ErasePicture([6])
  Label(["反省会"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["・・・・・・・・"])
  FadeoutScreen([])
  FadeoutBGM([1])
  Wait([120])
  Script(["memory_interruption"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["You hear Ilias' voice calling out to you... Receive her evaluation?"])
  ShowText([""])
  ShowChoices([["Receive Evaluation", "Change Difficulty", "Reincarnate"], 3])
  When([0, "反省会に出る"])
    PlayBGM(["RPG::BGM(@name=\"irias\", @volume=90, @pitch=105)"])
    ShowPicture([1, "bg001", 0, 0, 0, 0, 100, 100, 255, 0])
    FadeinScreen([])
    ShowPicture([5, "80_iriasu_st04", 0, 0, 0, 0, 100, 100, 0, 0])
    MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
    ShowTextAttributes(["iriasu_fc1", 3, 0, 2])
    ShowText(["\\n<Ilias>"])
    ShowText(["With your opponent as the Queen Vampire... Of course you would end up as a dried fish again."])
    ShowText(["I see a beached whale near Port Natalia that wants to be your friend."])
    ShowPicture([5, "80_iriasu_st01", 0, 0, 0, 0, 100, 100, 255, 0])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["\\n<Ilias>"])
    ShowText(["Queen Vampire uses powerful Physical attacks and Lightning based skills."])
    ShowText(["She also has a powerful Seduction skill."])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["\\n<Ilias>"])
    ShowText(["She is weak to Fire elemental attacks and Sleep works if you want to inflict status ailments on her."])
    ShowText(["Ascension also has a low chance to work, how very interesting... A boss who is weak to one type of instant death."])
    ShowPicture([5, "80_iriasu_st02", 0, 0, 0, 0, 100, 100, 255, 0])
    ShowTextAttributes(["iriasu_fc1", 1, 0, 2])
    ShowText(["\\n<Ilias>"])
    ShowText(["Now go, oh dried fish."])
    ShowText(["Defeat the Queen Vampire, and annihilate that disgusting race."])
    FadeoutBGM([1])
    FadeoutScreen([])
    ErasePicture([5])
    ErasePicture([1])
    Wait([60])
    Empty([])

  When([1, "難易度を変更する"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Please choose a difficulty level."])
    CallCommonEvent([110])
    Empty([])

  When([2, "輪廻に戻る"])
    Empty([])

  ChoicesEnd([])
  CallCommonEvent([3000])
  Empty([])
